﻿Public Class KhachHangBUS
    Public Function GetKhachHang() As DataTable
        Dim nv As New KhachHangDAO
        Return nv.GetKhachHang()
    End Function
    Public Sub AddKhachHang(ByVal newNV As KhachHangDTO)
        Dim nv As New KhachHangDAO
        nv.AddKhachHang(newNV)
    End Sub
    Public Sub DelKhachHang(ByVal delNV As KhachHangDTO)
        Dim nv As New KhachHangDAO
        nv.DelKhachHang(delNV)
    End Sub
    Public Sub UpdateKhachHang(ByVal newNV As KhachHangDTO)
        Dim nv As New KhachHangDAO
        nv.UpdateKhachHang(newNV)
    End Sub
    Public Shared Function Get_DSKH()
        Dim nv As New KhachHangDAO
        Dim dt As DataTable
        dt = New DataTable()
        dt = nv.GetKhachHang()
        Return dt
    End Function
End Class
